program POS;

uses
  Forms,
  ufrmPosMain in 'ufrmPosMain.pas' {frmMain},
  WorkFormUnit in 'WorkFormUnit.pas' {frmLogin},
  UdataMoudule in 'UdataMoudule.pas' {dm: TDataModule};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(Tdm, dm);
  frmLogin:=TfrmLogin.Create(nil);
  frmLogin.ShowModal;
  if frmLogin.Tag =1 then
    Application.CreateForm(TfrmMain, frmMain);

  frmLogin.Free;
  

  Application.Run;
end.
